How To Draw Kaplan Meier Survival Curves In R